COMMENT ā VALID 00002 PAGES C REC PAGE DESCRIPTION C00001 00001 C00002 00002 (defun test (n) C00003 ENDMK Cā; (defun test (n) (let ((foo ())) (cond ((*catch 'baz (progn (cond ((not foo)(setq foo t))) (od n))))) (print foo))) (defun od (n) (*throw 'baz (zerop (remainder n 2)))) (test 4) (test 5) (fasload loss))